OpenEdge Development:<br />Progress 4GL Reference RETRY function

Release 10.1A: OpenEdge Development:
Progress 4GL Reference

RETRY function

Returns a TRUE value if the current block is being reprocessed after a previous UNDO, RETRY.

Syntax
RETRY 
Example

This procedure bypasses the display of the customer data when the REPEAT block is retried (if user changes the customer data and does not specify a country). When you run this procedure, notice that even though the procedure has undone any data that you entered (if you did not specify a country), the data still appears in the window. The data is saved in the screen buffers, but it is not stored in the customer record buffer. If you do not use the RETRY function, Progress reprocesses the DISPLAY statement and display the previous values for the customer fields, overwriting the data that was entered in error.
r-retry.p
REPEAT:
    PROMPT-FOR customer.cust-num.
    FIND customer USING cust-num. 

    IF NOT RETRY
      THEN DISPLAY name address city state country.
    ELSE DISPLAY country. 
    
    SET name address city state country.
    IF country = "" THEN UNDO, RETRY.
END. 
Notes

Using the RETRY function in a block turns off the default error processing, which result in no infinite loop protection for the block.

For more information on retry processing, see OpenEdge Development: Progress 4GL Handbook .

See also

UNDO statement